Voorbeeld van de functie Choose

Dit voorbeeld maakt gebruik van de functie Choose om een naam weer te geven als reactie op een index die is doorgegeven aan de procedure in de Ind-parameter.

Function GetChoice(Ind As Integer)
    GetChoice = Choose(Ind, "Snel", "Groot", "Nationaal")
End Function